home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / M-Md / MacWedding.cpt / MacWedding™ / HomeChurch / background_6869.txt < prev    next >
Text File  |  1992-09-15  |  26KB  |  1,279 lines

  1. -- background: 6869 from stack: in
  2. -- bmap block id: 7045
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: VendorCard
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 80
  10. -- high flags: 2003
  11. -- rect: left=65 top=283 right=336 bottom=110
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 4895 / 4895
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Go Previous
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual effect scroll up very fast to gray
  23.   visual effect scroll up very fast
  24.   go previous
  25. end mouseUp
  26.  
  27.  
  28.  
  29. -- part 2 (button)
  30. -- low flags: 00
  31. -- high flags: 2003
  32. -- rect: left=132 top=283 right=336 bottom=177
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 6724 / 6724
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Go Next
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   visual effect scroll down very fast to gray
  44.   visual effect scroll down very fast
  45.   go next
  46. end mouseUp
  47.  
  48.  
  49.  
  50. -- part 3 (button)
  51. -- low flags: 00
  52. -- high flags: 2003
  53. -- rect: left=199 top=283 right=336 bottom=244
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 8538 / 8538
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: Find
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   beep
  65. end mouseUp
  66.  
  67.  
  68.  
  69. -- part 4 (button)
  70. -- low flags: 00
  71. -- high flags: 2003
  72. -- rect: left=266 top=283 right=336 bottom=311
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 27713 / 27713
  75. -- text alignment: 1
  76. -- font id: 0
  77. -- text size: 12
  78. -- style flags: 0
  79. -- line height: 16
  80. -- part name: Reports
  81. ----- HyperTalk script -----
  82. on mouseUp
  83.   lock screen
  84.   push cd
  85.   Repeat with x = 19 to 25
  86.     show bkgnd btn x
  87.   end Repeat
  88.   unlock screen with dissolve
  89. end mouseUp
  90.  
  91.  
  92.  
  93. -- part 5 (button)
  94. -- low flags: 00
  95. -- high flags: 2003
  96. -- rect: left=333 top=283 right=336 bottom=378
  97. -- title width / last selected line: 0
  98. -- icon id / first selected line: 28646 / 28646
  99. -- text alignment: 1
  100. -- font id: 0
  101. -- text size: 12
  102. -- style flags: 0
  103. -- line height: 16
  104. -- part name: Help
  105. ----- HyperTalk script -----
  106. on mouseUp
  107.   lock screen
  108.   set the scroll of fld Help to 1
  109.   show fld Help
  110.   unlock screen with dissolve
  111. end mouseUp
  112.  
  113.  
  114.  
  115. -- part 6 (button)
  116. -- low flags: 00
  117. -- high flags: 2003
  118. -- rect: left=401 top=283 right=336 bottom=446
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 11120 / 11120
  121. -- text alignment: 1
  122. -- font id: 0
  123. -- text size: 12
  124. -- style flags: 0
  125. -- line height: 16
  126. -- part name: HomeChurch
  127. ----- HyperTalk script -----
  128. on mouseUp
  129.   visual effect venetian blinds to gray
  130.   visual effect venetian blinds
  131.   go first cd
  132. end mouseUp
  133.  
  134.  
  135.  
  136. -- part 11 (button)
  137. -- low flags: 00
  138. -- high flags: 2003
  139. -- rect: left=463 top=45 right=86 bottom=508
  140. -- title width / last selected line: 0
  141. -- icon id / first selected line: 10128 / 10128
  142. -- text alignment: 1
  143. -- font id: 0
  144. -- text size: 12
  145. -- style flags: 0
  146. -- line height: 16
  147. -- part name: Guests
  148. ----- HyperTalk script -----
  149. on mouseUp
  150.   visual effect iris open to gray
  151.   visual effect iris open
  152.   go cd 2 of bkgnd GuestCard of stack GuestCards
  153. end mouseUp
  154.  
  155.  
  156.  
  157. -- part 12 (button)
  158. -- low flags: 00
  159. -- high flags: 2003
  160. -- rect: left=463 top=88 right=129 bottom=508
  161. -- title width / last selected line: 0
  162. -- icon id / first selected line: 25740 / 25740
  163. -- text alignment: 1
  164. -- font id: 0
  165. -- text size: 12
  166. -- style flags: 0
  167. -- line height: 16
  168. -- part name: Events
  169. ----- HyperTalk script -----
  170. on mouseUp
  171.   visual effect iris open to gray
  172.   visual effect iris open
  173.   go cd Shower
  174. end mouseUp
  175.  
  176.  
  177.  
  178. -- part 13 (button)
  179. -- low flags: 00
  180. -- high flags: 2003
  181. -- rect: left=463 top=132 right=173 bottom=508
  182. -- title width / last selected line: 0
  183. -- icon id / first selected line: 18992 / 18992
  184. -- text alignment: 1
  185. -- font id: 0
  186. -- text size: 12
  187. -- style flags: 0
  188. -- line height: 16
  189. -- part name: Budget
  190. ----- HyperTalk script -----
  191. on mouseUp
  192.   visual effect iris open to gray
  193.   visual effect iris open
  194.   go cd Budget
  195. end mouseUp
  196.  
  197.  
  198.  
  199. -- part 14 (button)
  200. -- low flags: 00
  201. -- high flags: 2003
  202. -- rect: left=463 top=176 right=217 bottom=508
  203. -- title width / last selected line: 0
  204. -- icon id / first selected line: 10971 / 10971
  205. -- text alignment: 1
  206. -- font id: 0
  207. -- text size: 12
  208. -- style flags: 0
  209. -- line height: 16
  210. -- part name: Checklists
  211. ----- HyperTalk script -----
  212. on mouseUp
  213.   visual effect iris open to gray
  214.   visual effect iris open
  215.   go cd Checklist
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part 15 (button)
  221. -- low flags: 00
  222. -- high flags: 0003
  223. -- rect: left=463 top=220 right=261 bottom=508
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 29253 / 29253
  226. -- text alignment: 1
  227. -- font id: 0
  228. -- text size: 12
  229. -- style flags: 0
  230. -- line height: 16
  231. -- part name: Vendors
  232. ----- HyperTalk script -----
  233. on mouseUp
  234.   beep
  235. end mouseUp
  236.  
  237.  
  238.  
  239. -- part 23 (button)
  240. -- low flags: 00
  241. -- high flags: A000
  242. -- rect: left=3 top=298 right=318 bottom=45
  243. -- title width / last selected line: 0
  244. -- icon id / first selected line: 0 / 0
  245. -- text alignment: 1
  246. -- font id: 0
  247. -- text size: 9
  248. -- style flags: 8192
  249. -- line height: 12
  250. -- part name: DELETE
  251. ----- HyperTalk script -----
  252. on mouseUp
  253.   beep
  254. end mouseUp
  255.  
  256.  
  257.  
  258. -- part 26 (button)
  259. -- low flags: 00
  260. -- high flags: A000
  261. -- rect: left=2 top=318 right=339 bottom=44
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 0 / 0
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 9
  267. -- style flags: 8192
  268. -- line height: 12
  269. -- part name: SORT
  270. ----- HyperTalk script -----
  271. on mouseUp
  272.   beep
  273. end mouseUp
  274.  
  275.  
  276.  
  277. -- part 25 (button)
  278. -- low flags: 00
  279. -- high flags: 2000
  280. -- rect: left=467 top=298 right=337 bottom=509
  281. -- title width / last selected line: 0
  282. -- icon id / first selected line: 0 / 0
  283. -- text alignment: 1
  284. -- font id: 0
  285. -- text size: 12
  286. -- style flags: 0
  287. -- line height: 16
  288. -- part name: New Button
  289. ----- HyperTalk script -----
  290. on mouseUp
  291.   beep
  292. end mouseUp
  293.  
  294.  
  295. -- part 27 (button)
  296. -- low flags: 00
  297. -- high flags: 0003
  298. -- rect: left=65 top=283 right=336 bottom=110
  299. -- title width / last selected line: 0
  300. -- icon id / first selected line: 26950 / 26950
  301. -- text alignment: 1
  302. -- font id: 0
  303. -- text size: 12
  304. -- style flags: 0
  305. -- line height: 16
  306. -- part name: Go Previous
  307. ----- HyperTalk script -----
  308. on mouseUp
  309.   beep
  310. end mouseUp
  311.  
  312.  
  313.  
  314. -- part 28 (button)
  315. -- low flags: 00
  316. -- high flags: 0003
  317. -- rect: left=132 top=283 right=336 bottom=177
  318. -- title width / last selected line: 0
  319. -- icon id / first selected line: 26001 / 26001
  320. -- text alignment: 1
  321. -- font id: 0
  322. -- text size: 12
  323. -- style flags: 0
  324. -- line height: 16
  325. -- part name: Go Next
  326. ----- HyperTalk script -----
  327. on mouseUp
  328.   beep
  329. end mouseUp
  330.  
  331.  
  332.  
  333. -- part 29 (field)
  334. -- low flags: 01
  335. -- high flags: 0000
  336. -- rect: left=133 top=11 right=27 bottom=362
  337. -- title width / last selected line: 0
  338. -- icon id / first selected line: 0 / 0
  339. -- text alignment: 1
  340. -- font id: 2
  341. -- text size: 14
  342. -- style flags: 256
  343. -- line height: 18
  344. -- part name: VENDOR CARD
  345.  
  346.  
  347. -- part 31 (field)
  348. -- low flags: 02
  349. -- high flags: 4000
  350. -- rect: left=100 top=50 right=65 bottom=305
  351. -- title width / last selected line: 0
  352. -- icon id / first selected line: 0 / 0
  353. -- text alignment: 0
  354. -- font id: 2
  355. -- text size: 10
  356. -- style flags: 0
  357. -- line height: 13
  358. -- part name: VendorName
  359.  
  360.  
  361. -- part 34 (field)
  362. -- low flags: 02
  363. -- high flags: 4000
  364. -- rect: left=350 top=50 right=65 bottom=448
  365. -- title width / last selected line: 0
  366. -- icon id / first selected line: 0 / 0
  367. -- text alignment: 1
  368. -- font id: 2
  369. -- text size: 10
  370. -- style flags: 0
  371. -- line height: 13
  372. -- part name: Category
  373.  
  374.  
  375. -- part 44 (field)
  376. -- low flags: 02
  377. -- high flags: 4000
  378. -- rect: left=100 top=65 right=93 bottom=448
  379. -- title width / last selected line: 0
  380. -- icon id / first selected line: 0 / 0
  381. -- text alignment: 0
  382. -- font id: 2
  383. -- text size: 10
  384. -- style flags: 0
  385. -- line height: 13
  386. -- part name: Address
  387.  
  388.  
  389. -- part 45 (field)
  390. -- low flags: 02
  391. -- high flags: 4000
  392. -- rect: left=100 top=92 right=107 bottom=248
  393. -- title width / last selected line: 0
  394. -- icon id / first selected line: 0 / 0
  395. -- text alignment: 0
  396. -- font id: 2
  397. -- text size: 10
  398. -- style flags: 0
  399. -- line height: 13
  400. -- part name: City
  401.  
  402.  
  403. -- part 46 (field)
  404. -- low flags: 02
  405. -- high flags: 4000
  406. -- rect: left=302 top=92 right=107 bottom=335
  407. -- title width / last selected line: 0
  408. -- icon id / first selected line: 0 / 0
  409. -- text alignment: 1
  410. -- font id: 2
  411. -- text size: 10
  412. -- style flags: 0
  413. -- line height: 13
  414. -- part name: State
  415.  
  416.  
  417. -- part 47 (field)
  418. -- low flags: 02
  419. -- high flags: 4000
  420. -- rect: left=389 top=92 right=107 bottom=448
  421. -- title width / last selected line: 0
  422. -- icon id / first selected line: 0 / 0
  423. -- text alignment: 1
  424. -- font id: 2
  425. -- text size: 10
  426. -- style flags: 0
  427. -- line height: 13
  428. -- part name: ZIP
  429.  
  430.  
  431. -- part 49 (field)
  432. -- low flags: 02
  433. -- high flags: 4000
  434. -- rect: left=100 top=111 right=126 bottom=191
  435. -- title width / last selected line: 0
  436. -- icon id / first selected line: 0 / 0
  437. -- text alignment: 1
  438. -- font id: 2
  439. -- text size: 10
  440. -- style flags: 0
  441. -- line height: 13
  442. -- part name: MainPhone
  443.  
  444.  
  445. -- part 50 (field)
  446. -- low flags: 02
  447. -- high flags: 4000
  448. -- rect: left=224 top=111 right=126 bottom=315
  449. -- title width / last selected line: 0
  450. -- icon id / first selected line: 0 / 0
  451. -- text alignment: 1
  452. -- font id: 2
  453. -- text size: 10
  454. -- style flags: 0
  455. -- line height: 13
  456. -- part name: DirectLine
  457.  
  458.  
  459. -- part 54 (field)
  460. -- low flags: 02
  461. -- high flags: 4000
  462. -- rect: left=357 top=111 right=126 bottom=448
  463. -- title width / last selected line: 0
  464. -- icon id / first selected line: 0 / 0
  465. -- text alignment: 1
  466. -- font id: 2
  467. -- text size: 10
  468. -- style flags: 0
  469. -- line height: 13
  470. -- part name: FAXNumber
  471.  
  472.  
  473. -- part 56 (field)
  474. -- low flags: 02
  475. -- high flags: 4000
  476. -- rect: left=100 top=137 right=152 bottom=248
  477. -- title width / last selected line: 0
  478. -- icon id / first selected line: 0 / 0
  479. -- text alignment: 0
  480. -- font id: 2
  481. -- text size: 10
  482. -- style flags: 0
  483. -- line height: 13
  484. -- part name: ContactName
  485.  
  486.  
  487. -- part 57 (field)
  488. -- low flags: 02
  489. -- high flags: 4000
  490. -- rect: left=100 top=151 right=166 bottom=248
  491. -- title width / last selected line: 0
  492. -- icon id / first selected line: 0 / 0
  493. -- text alignment: 0
  494. -- font id: 2
  495. -- text size: 10
  496. -- style flags: 0
  497. -- line height: 13
  498. -- part name: ContactTitle
  499.  
  500.  
  501. -- part 58 (field)
  502. -- low flags: 02
  503. -- high flags: 4000
  504. -- rect: left=100 top=165 right=180 bottom=248
  505. -- title width / last selected line: 0
  506. -- icon id / first selected line: 0 / 0
  507. -- text alignment: 0
  508. -- font id: 2
  509. -- text size: 10
  510. -- style flags: 0
  511. -- line height: 13
  512. -- part name: Salutation
  513.  
  514.  
  515. -- part 65 (field)
  516. -- low flags: 02
  517. -- high flags: 4000
  518. -- rect: left=305 top=137 right=152 bottom=448
  519. -- title width / last selected line: 0
  520. -- icon id / first selected line: 0 / 0
  521. -- text alignment: 0
  522. -- font id: 2
  523. -- text size: 10
  524. -- style flags: 0
  525. -- line height: 13
  526. -- part name: Manager
  527.  
  528.  
  529. -- part 136 (field)
  530. -- low flags: 02
  531. -- high flags: 4000
  532. -- rect: left=305 top=165 right=180 bottom=448
  533. -- title width / last selected line: 0
  534. -- icon id / first selected line: 0 / 0
  535. -- text alignment: 0
  536. -- font id: 2
  537. -- text size: 10
  538. -- style flags: 0
  539. -- line height: 13
  540. -- part name: Bookkeeper
  541.  
  542.  
  543. -- part 137 (field)
  544. -- low flags: 02
  545. -- high flags: 4000
  546. -- rect: left=100 top=191 right=206 bottom=248
  547. -- title width / last selected line: 0
  548. -- icon id / first selected line: 0 / 0
  549. -- text alignment: 0
  550. -- font id: 2
  551. -- text size: 10
  552. -- style flags: 0
  553. -- line height: 13
  554. -- part name: RespParty
  555.  
  556.  
  557. -- part 138 (field)
  558. -- low flags: 02
  559. -- high flags: 4000
  560. -- rect: left=161 top=205 right=220 bottom=248
  561. -- title width / last selected line: 0
  562. -- icon id / first selected line: 0 / 0
  563. -- text alignment: 65535
  564. -- font id: 2
  565. -- text size: 10
  566. -- style flags: 0
  567. -- line height: 13
  568. -- part name: FirstContact
  569.  
  570.  
  571. -- part 139 (field)
  572. -- low flags: 02
  573. -- high flags: 4000
  574. -- rect: left=161 top=219 right=234 bottom=248
  575. -- title width / last selected line: 0
  576. -- icon id / first selected line: 0 / 0
  577. -- text alignment: 65535
  578. -- font id: 2
  579. -- text size: 10
  580. -- style flags: 0
  581. -- line height: 13
  582. -- part name: DueDate
  583.  
  584.  
  585. -- part 140 (field)
  586. -- low flags: 02
  587. -- high flags: 4000
  588. -- rect: left=161 top=233 right=248 bottom=248
  589. -- title width / last selected line: 0
  590. -- icon id / first selected line: 0 / 0
  591. -- text alignment: 65535
  592. -- font id: 2
  593. -- text size: 10
  594. -- style flags: 0
  595. -- line height: 13
  596. -- part name: DepositAmt
  597.  
  598.  
  599. -- part 141 (field)
  600. -- low flags: 02
  601. -- high flags: 4007
  602. -- rect: left=311 top=191 right=222 bottom=447
  603. -- title width / last selected line: 0
  604. -- icon id / first selected line: 0 / 0
  605. -- text alignment: 0
  606. -- font id: 2
  607. -- text size: 9
  608. -- style flags: 0
  609. -- line height: 10
  610. -- part name: References
  611.  
  612.  
  613. -- part 142 (field)
  614. -- low flags: 02
  615. -- high flags: 4007
  616. -- rect: left=312 top=243 right=274 bottom=448
  617. -- title width / last selected line: 0
  618. -- icon id / first selected line: 0 / 0
  619. -- text alignment: 0
  620. -- font id: 2
  621. -- text size: 9
  622. -- style flags: 0
  623. -- line height: 10
  624. -- part name: Reminders
  625.  
  626.  
  627. -- part 143 (button)
  628. -- low flags: 00
  629. -- high flags: 2000
  630. -- rect: left=40 top=187 right=207 bottom=101
  631. -- title width / last selected line: 0
  632. -- icon id / first selected line: 0 / 0
  633. -- text alignment: 1
  634. -- font id: 0
  635. -- text size: 12
  636. -- style flags: 0
  637. -- line height: 16
  638. -- part name: RespParty
  639. ----- HyperTalk script -----
  640. on mouseUp
  641.   lock screen
  642.   Repeat with x = 26 to 30
  643.     show bkgnd btn x
  644.   end Repeat
  645.   unlock screen
  646. end mouseUp
  647.  
  648.  
  649.  
  650.  
  651. -- part 144 (button)
  652. -- low flags: 00
  653. -- high flags: 2000
  654. -- rect: left=304 top=53 right=69 bottom=351
  655. -- title width / last selected line: 0
  656. -- icon id / first selected line: 0 / 0
  657. -- text alignment: 1
  658. -- font id: 0
  659. -- text size: 12
  660. -- style flags: 0
  661. -- line height: 16
  662. -- part name: RespParty
  663. ----- HyperTalk script -----
  664. on mouseUp
  665.   lock screen
  666.   Repeat with x = 31 to 41
  667.     show bkgnd btn x
  668.   end Repeat
  669. end mouseUp
  670. on mouseUp
  671.   if fld Category is empty then
  672.     get location of fld Category
  673.     click at it
  674.   else
  675.     get location of fld Category
  676.     click at it
  677.     tabKey
  678.   end if
  679. end mouseUp
  680.  
  681.  
  682.  
  683.  
  684. -- part 147 (field)
  685. -- low flags: 03
  686. -- high flags: 0002
  687. -- rect: left=349 top=226 right=241 bottom=389
  688. -- title width / last selected line: 0
  689. -- icon id / first selected line: 0 / 0
  690. -- text alignment: 1
  691. -- font id: 2
  692. -- text size: 10
  693. -- style flags: 0
  694. -- line height: 13
  695. -- part name: RefCheck
  696. ----- HyperTalk script -----
  697. on mouseUp
  698.   get fld refCheck
  699.   if it is "Yes" then put "No" into fld refCheck
  700.   if it is "No" then put "" into fld refCheck
  701.   if it is "" then put "Yes" into fld refCheck
  702. end mouseUp
  703.  
  704.  
  705. -- part 148 (field)
  706. -- low flags: 81
  707. -- high flags: 0007
  708. -- rect: left=41 top=280 right=338 bottom=457
  709. -- title width / last selected line: 0
  710. -- icon id / first selected line: 0 / 0
  711. -- text alignment: 0
  712. -- font id: 21
  713. -- text size: 10
  714. -- style flags: 0
  715. -- line height: 13
  716. -- part name: Help
  717. ----- HyperTalk script -----
  718. on mouseUp
  719.   lock screen
  720.   hide fld Help
  721.   unlock screen with dissolve
  722. end mouseUp
  723.  
  724.  
  725. -- part 152 (button)
  726. -- low flags: 80
  727. -- high flags: 0004
  728. -- rect: left=231 top=172 right=280 bottom=448
  729. -- title width / last selected line: 0
  730. -- icon id / first selected line: 0 / 0
  731. -- text alignment: 1
  732. -- font id: 0
  733. -- text size: 12
  734. -- style flags: 8192
  735. -- line height: 16
  736. -- part name: 
  737.  
  738.  
  739. -- part 153 (button)
  740. -- low flags: 80
  741. -- high flags: A004
  742. -- rect: left=236 top=177 right=198 bottom=442
  743. -- title width / last selected line: 0
  744. -- icon id / first selected line: 0 / 0
  745. -- text alignment: 1
  746. -- font id: 0
  747. -- text size: 12
  748. -- style flags: 8192
  749. -- line height: 16
  750. -- part name: 30 Day Reminder of Services
  751. ----- HyperTalk script -----
  752. on mouseUp
  753.   beep
  754.   lock screen
  755.   Repeat with x = 19 to 24
  756.     hide bkgnd btn x
  757.   end Repeat
  758.   unlock screen with dissolve
  759. end mouseUp
  760.  
  761.  
  762.  
  763. -- part 155 (button)
  764. -- low flags: 80
  765. -- high flags: A004
  766. -- rect: left=236 top=196 right=217 bottom=442
  767. -- title width / last selected line: 0
  768. -- icon id / first selected line: 0 / 0
  769. -- text alignment: 1
  770. -- font id: 0
  771. -- text size: 12
  772. -- style flags: 8192
  773. -- line height: 16
  774. -- part name: Thank-You Letter
  775. ----- HyperTalk script -----
  776. on mouseUp
  777.   beep
  778.   lock screen
  779.   Repeat with x = 19 to 24
  780.     hide bkgnd btn x
  781.   end Repeat
  782.   unlock screen with dissolve
  783. end mouseUp
  784.  
  785.  
  786.  
  787. -- part 156 (button)
  788. -- low flags: 80
  789. -- high flags: A004
  790. -- rect: left=236 top=215 right=236 bottom=442
  791. -- title width / last selected line: 0
  792. -- icon id / first selected line: 0 / 0
  793. -- text alignment: 1
  794. -- font id: 0
  795. -- text size: 12
  796. -- style flags: 8192
  797. -- line height: 16
  798. -- part name: Confirmation Letter
  799. ----- HyperTalk script -----
  800. on mouseUp
  801.   beep
  802.   lock screen
  803.   Repeat with x = 19 to 24
  804.     hide bkgnd btn x
  805.   end Repeat
  806.   unlock screen with dissolve
  807. end mouseUp
  808.  
  809.  
  810.  
  811. -- part 157 (button)
  812. -- low flags: 80
  813. -- high flags: A004
  814. -- rect: left=236 top=234 right=255 bottom=442
  815. -- title width / last selected line: 0
  816. -- icon id / first selected line: 0 / 0
  817. -- text alignment: 1
  818. -- font id: 0
  819. -- text size: 12
  820. -- style flags: 8192
  821. -- line height: 16
  822. -- part name: Vendor Phonebook
  823. ----- HyperTalk script -----
  824. on mouseUp
  825.   beep
  826.   lock screen
  827.   Repeat with x = 19 to 24
  828.     hide bkgnd btn x
  829.   end Repeat
  830.   unlock screen with dissolve
  831. end mouseUp
  832.  
  833.  
  834.  
  835. -- part 158 (button)
  836. -- low flags: 80
  837. -- high flags: A004
  838. -- rect: left=236 top=253 right=274 bottom=442
  839. -- title width / last selected line: 0
  840. -- icon id / first selected line: 0 / 0
  841. -- text alignment: 1
  842. -- font id: 0
  843. -- text size: 12
  844. -- style flags: 8192
  845. -- line height: 16
  846. -- part name: Vendor Report
  847. ----- HyperTalk script -----
  848. on mouseUp
  849.   beep
  850.   lock screen
  851.   Repeat with x = 19 to 24
  852.     hide bkgnd btn x
  853.   end Repeat
  854.   unlock screen with dissolve
  855. end mouseUp
  856.  
  857.  
  858.  
  859. -- part 159 (button)
  860. -- low flags: 00
  861. -- high flags: 2000
  862. -- rect: left=266 top=284 right=335 bottom=311
  863. -- title width / last selected line: 0
  864. -- icon id / first selected line: 0 / 0
  865. -- text alignment: 1
  866. -- font id: 0
  867. -- text size: 12
  868. -- style flags: 8192
  869. -- line height: 16
  870. -- part name: 
  871. ----- HyperTalk script -----
  872. on mouseUp
  873.   lock screen
  874.   Repeat with x = 19 to 25
  875.     hide bkgnd btn x
  876.   end Repeat
  877.   unlock screen with dissolve
  878. end mouseUp
  879.  
  880.  
  881.  
  882. -- part 160 (button)
  883. -- low flags: 80
  884. -- high flags: 0004
  885. -- rect: left=42 top=136 right=188 bottom=143
  886. -- title width / last selected line: 0
  887. -- icon id / first selected line: 0 / 0
  888. -- text alignment: 1
  889. -- font id: 0
  890. -- text size: 12
  891. -- style flags: 8192
  892. -- line height: 16
  893. -- part name: 
  894.  
  895.  
  896. -- part 161 (button)
  897. -- low flags: 80
  898. -- high flags: A004
  899. -- rect: left=44 top=139 right=154 bottom=139
  900. -- title width / last selected line: 0
  901. -- icon id / first selected line: 0 / 0
  902. -- text alignment: 1
  903. -- font id: 0
  904. -- text size: 12
  905. -- style flags: 8192
  906. -- line height: 16
  907. -- part name: Other
  908. ----- HyperTalk script -----
  909. on mouseUp
  910.   lock screen
  911.   Repeat with x = 26 to 30
  912.     hide bkgnd btn x
  913.   end Repeat
  914.   put "" into line 1 of bkgnd fld "RespParty"
  915.   unlock screen
  916.   get location of fld RespParty
  917.   click at it
  918. end mouseUp
  919.  
  920.  
  921.  
  922. -- part 166 (button)
  923. -- low flags: 80
  924. -- high flags: A004
  925. -- rect: left=44 top=152 right=169 bottom=139
  926. -- title width / last selected line: 0
  927. -- icon id / first selected line: 0 / 0
  928. -- text alignment: 1
  929. -- font id: 0
  930. -- text size: 12
  931. -- style flags: 8192
  932. -- line height: 16
  933. -- part name: Groom's Family
  934. ----- HyperTalk script -----
  935. on mouseUp
  936.   lock screen
  937.   Repeat with x = 26 to 30
  938.     hide bkgnd btn x
  939.   end Repeat
  940.   put "Groom's Family" into line 1 of bkgnd fld "RespParty"
  941.   unlock screen
  942.   get location of fld FirstContact
  943.   click at it
  944.   get location of fld FirstContact
  945.   click at it
  946. end mouseUp
  947.  
  948.  
  949.  
  950. -- part 167 (button)
  951. -- low flags: 80
  952. -- high flags: A004
  953. -- rect: left=44 top=167 right=184 bottom=139
  954. -- title width / last selected line: 0
  955. -- icon id / first selected line: 0 / 0
  956. -- text alignment: 1
  957. -- font id: 0
  958. -- text size: 12
  959. -- style flags: 8192
  960. -- line height: 16
  961. -- part name: Bride's Family
  962. ----- HyperTalk script -----
  963. on mouseUp
  964.   lock screen
  965.   Repeat with x = 26 to 30
  966.     hide bkgnd btn x
  967.   end Repeat
  968.   put "Bride's Family" into line 1 of bkgnd fld "RespParty"
  969.   unlock screen
  970.   get location of fld FirstContact
  971.   click at it
  972. end mouseUp
  973.  
  974.  
  975.  
  976. -- part 168 (button)
  977. -- low flags: 80
  978. -- high flags: 2000
  979. -- rect: left=41 top=187 right=207 bottom=101
  980. -- title width / last selected line: 0
  981. -- icon id / first selected line: 0 / 0
  982. -- text alignment: 1
  983. -- font id: 0
  984. -- text size: 12
  985. -- style flags: 8192
  986. -- line height: 16
  987. -- part name: 
  988. ----- HyperTalk script -----
  989. on mouseUp
  990.   lock screen
  991.   Repeat with x = 26 to 30
  992.     hide bkgnd btn x
  993.   end Repeat
  994.   unlock screen
  995. end mouseUp
  996.  
  997.  
  998.  
  999. -- part 169 (button)
  1000. -- low flags: 80
  1001. -- high flags: 0004
  1002. -- rect: left=304 top=68 right=211 bottom=405
  1003. -- title width / last selected line: 0
  1004. -- icon id / first selected line: 0 / 0
  1005. -- text alignment: 1
  1006. -- font id: 0
  1007. -- text size: 12
  1008. -- style flags: 8192
  1009. -- line height: 16
  1010. -- part name: 
  1011.  
  1012.  
  1013. -- part 170 (button)
  1014. -- low flags: 80
  1015. -- high flags: A004
  1016. -- rect: left=307 top=70 right=87 bottom=401
  1017. -- title width / last selected line: 0
  1018. -- icon id / first selected line: 0 / 0
  1019. -- text alignment: 1
  1020. -- font id: 0
  1021. -- text size: 12
  1022. -- style flags: 8192
  1023. -- line height: 16
  1024. -- part name: Beverage
  1025. ----- HyperTalk script -----
  1026. on mouseUp
  1027.   lock screen
  1028.   put "Beverage" into line 1 of bkgnd fld "Category"
  1029.   Repeat with x = 31 to 41
  1030.     hide bkgnd btn x
  1031.   end Repeat
  1032.   unlock screen
  1033.   get location of fld Category
  1034.   click at it
  1035.   tabKey
  1036. end mouseUp
  1037.  
  1038.  
  1039.  
  1040. -- part 171 (button)
  1041. -- low flags: 80
  1042. -- high flags: A004
  1043. -- rect: left=307 top=85 right=102 bottom=401
  1044. -- title width / last selected line: 0
  1045. -- icon id / first selected line: 0 / 0
  1046. -- text alignment: 1
  1047. -- font id: 0
  1048. -- text size: 12
  1049. -- style flags: 8192
  1050. -- line height: 16
  1051. -- part name: Florist
  1052. ----- HyperTalk script -----
  1053. on mouseUp
  1054.   lock screen
  1055.   put "Florist" into line 1 of bkgnd fld "Category"
  1056.   Repeat with x = 31 to 41
  1057.     hide bkgnd btn x
  1058.   end Repeat
  1059.   unlock screen
  1060.   get location of fld Category
  1061.   click at it
  1062.   tabKey
  1063. end mouseUp
  1064.  
  1065.  
  1066.  
  1067. -- part 172 (button)
  1068. -- low flags: 80
  1069. -- high flags: A004
  1070. -- rect: left=307 top=100 right=117 bottom=401
  1071. -- title width / last selected line: 0
  1072. -- icon id / first selected line: 0 / 0
  1073. -- text alignment: 1
  1074. -- font id: 0
  1075. -- text size: 12
  1076. -- style flags: 8192
  1077. -- line height: 16
  1078. -- part name: Food
  1079. ----- HyperTalk script -----
  1080. on mouseUp
  1081.   lock screen
  1082.   put "Food" into line 1 of bkgnd fld "Category"
  1083.   Repeat with x = 31 to 41
  1084.     hide bkgnd btn x
  1085.   end Repeat
  1086.   unlock screen
  1087.   get location of fld Category
  1088.   click at it
  1089.   tabKey
  1090. end mouseUp
  1091.  
  1092.  
  1093.  
  1094. -- part 173 (button)
  1095. -- low flags: 80
  1096. -- high flags: A004
  1097. -- rect: left=307 top=115 right=132 bottom=401
  1098. -- title width / last selected line: 0
  1099. -- icon id / first selected line: 0 / 0
  1100. -- text alignment: 1
  1101. -- font id: 0
  1102. -- text size: 12
  1103. -- style flags: 8192
  1104. -- line height: 16
  1105. -- part name: Lighting
  1106. ----- HyperTalk script -----
  1107. on mouseUp
  1108.   lock screen
  1109.   put "Lighting" into line 1 of bkgnd fld "Category"
  1110.   Repeat with x = 31 to 41
  1111.     hide bkgnd btn x
  1112.   end Repeat
  1113.   unlock screen
  1114.   get location of fld Category
  1115.   click at it
  1116.   tabKey
  1117. end mouseUp
  1118.  
  1119.  
  1120.  
  1121. -- part 174 (button)
  1122. -- low flags: 80
  1123. -- high flags: A004
  1124. -- rect: left=307 top=130 right=147 bottom=401
  1125. -- title width / last selected line: 0
  1126. -- icon id / first selected line: 0 / 0
  1127. -- text alignment: 1
  1128. -- font id: 0
  1129. -- text size: 12
  1130. -- style flags: 8192
  1131. -- line height: 16
  1132. -- part name: Music
  1133. ----- HyperTalk script -----
  1134. on mouseUp
  1135.   lock screen
  1136.   put "Music" into line 1 of bkgnd fld "Category"
  1137.   Repeat with x = 31 to 41
  1138.     hide bkgnd btn x
  1139.   end Repeat
  1140.   unlock screen
  1141.   get location of fld Category
  1142.   click at it
  1143.   tabKey
  1144. end mouseUp
  1145.  
  1146.  
  1147.  
  1148. -- part 175 (button)
  1149. -- low flags: 80
  1150. -- high flags: A004
  1151. -- rect: left=307 top=145 right=162 bottom=401
  1152. -- title width / last selected line: 0
  1153. -- icon id / first selected line: 0 / 0
  1154. -- text alignment: 1
  1155. -- font id: 0
  1156. -- text size: 12
  1157. -- style flags: 8192
  1158. -- line height: 16
  1159. -- part name: Photography
  1160. ----- HyperTalk script -----
  1161. on mouseUp
  1162.   lock screen
  1163.   put "Photography" into line 1 of bkgnd fld "Category"
  1164.   Repeat with x = 31 to 41
  1165.     hide bkgnd btn x
  1166.   end Repeat
  1167.   unlock screen
  1168.   get location of fld Category
  1169.   click at it
  1170.   tabKey
  1171. end mouseUp
  1172.  
  1173.  
  1174.  
  1175. -- part 176 (button)
  1176. -- low flags: 80
  1177. -- high flags: A004
  1178. -- rect: left=307 top=160 right=177 bottom=401
  1179. -- title width / last selected line: 0
  1180. -- icon id / first selected line: 0 / 0
  1181. -- text alignment: 1
  1182. -- font id: 0
  1183. -- text size: 12
  1184. -- style flags: 8192
  1185. -- line height: 16
  1186. -- part name: Sound system
  1187. ----- HyperTalk script -----
  1188. on mouseUp
  1189.   lock screen
  1190.   put "Sound System" into line 1 of bkgnd fld "Category"
  1191.   Repeat with x = 31 to 41
  1192.     hide bkgnd btn x
  1193.   end Repeat
  1194.   unlock screen
  1195.   get location of fld Category
  1196.   click at it
  1197.   tabKey
  1198. end mouseUp
  1199.  
  1200.  
  1201.  
  1202. -- part 177 (button)
  1203. -- low flags: 80
  1204. -- high flags: A004
  1205. -- rect: left=307 top=175 right=192 bottom=401
  1206. -- title width / last selected line: 0
  1207. -- icon id / first selected line: 0 / 0
  1208. -- text alignment: 1
  1209. -- font id: 0
  1210. -- text size: 12
  1211. -- style flags: 8192
  1212. -- line height: 16
  1213. -- part name: Transportation
  1214. ----- HyperTalk script -----
  1215. on mouseUp
  1216.   lock screen
  1217.   put "Transportation" into line 1 of bkgnd fld "Category"
  1218.   Repeat with x = 31 to 41
  1219.     hide bkgnd btn x
  1220.   end Repeat
  1221.   unlock screen
  1222.   get location of fld Category
  1223.   click at it
  1224.   tabKey
  1225. end mouseUp
  1226.  
  1227.  
  1228.  
  1229. -- part 178 (button)
  1230. -- low flags: 80
  1231. -- high flags: A004
  1232. -- rect: left=307 top=190 right=207 bottom=401
  1233. -- title width / last selected line: 0
  1234. -- icon id / first selected line: 0 / 0
  1235. -- text alignment: 1
  1236. -- font id: 0
  1237. -- text size: 12
  1238. -- style flags: 8192
  1239. -- line height: 16
  1240. -- part name: Other
  1241. ----- HyperTalk script -----
  1242. on mouseUp
  1243.   lock screen
  1244.   put "" into line 1 of bkgnd fld "Category"
  1245.   Repeat with x = 31 to 41
  1246.     hide bkgnd btn x
  1247.   end Repeat
  1248.   unlock screen
  1249.   get location of fld Category
  1250.   click at it
  1251.   get location of fld Category
  1252.   click at it
  1253.   tabKey
  1254. end mouseUp
  1255.  
  1256.  
  1257.  
  1258. -- part 179 (button)
  1259. -- low flags: 80
  1260. -- high flags: 2000
  1261. -- rect: left=304 top=53 right=69 bottom=351
  1262. -- title width / last selected line: 0
  1263. -- icon id / first selected line: 0 / 0
  1264. -- text alignment: 1
  1265. -- font id: 0
  1266. -- text size: 12
  1267. -- style flags: 8192
  1268. -- line height: 16
  1269. -- part name: 
  1270. ----- HyperTalk script -----
  1271. on mouseUp
  1272.   lock screen
  1273.   Repeat with x = 31 to 41
  1274.     hide bkgnd btn x
  1275.   end Repeat
  1276.   unlock screen
  1277. end mouseUp
  1278.  
  1279.